home *** CD-ROM | disk | FTP | other *** search
- object fmENDIKBR: TfmENDIKBR
- Left = 61
- Top = 36
- ActiveControl = DBGridENDIK
- BorderStyle = bsDialog
- Caption = 'END�KASYON �S�MLER� KAYITLARI'
- ClientHeight = 346
- ClientWidth = 525
- Color = clSilver
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = []
- KeyPreview = True
- Position = poScreenCenter
- OnKeyDown = FormKeyDown
- PixelsPerInch = 96
- TextHeight = 14
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 525
- Height = 57
- HelpContext = 314
- Align = alTop
- BevelInner = bvLowered
- BevelWidth = 3
- BorderWidth = 1
- Color = clNavy
- Ctl3D = True
- ParentCtl3D = False
- TabOrder = 0
- object Navigator: TDBNavigator
- Left = 15
- Top = 15
- Width = 135
- Height = 27
- DataSource = endikBrSRC
- VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbRefresh]
- Ctl3D = False
- Hints.Strings = (
- '�lk kay�t'
- '�nceki'
- 'Sonraki'
- 'SonKay�t'
- 'Yeni Kay�t'
- 'Kay�t Sil'
- 'D�zelt'
- 'Kaydet'
- 'Vazge�'
- 'Tazele')
- ParentCtl3D = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- TabStop = True
- end
- object BitBtnSec: TBitBtn
- Left = 418
- Top = 16
- Width = 89
- Height = 27
- HelpContext = 502
- Caption = '&Se�'
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 0
- Visible = False
- OnClick = BitBtnSecClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333303
- 333333333333337FF3333333333333903333333333333377FF33333333333399
- 03333FFFFFFFFF777FF3000000999999903377777777777777FF0FFFF0999999
- 99037F3337777777777F0FFFF099999999907F3FF777777777770F00F0999999
- 99037F773777777777730FFFF099999990337F3FF777777777330F00FFFFF099
- 03337F773333377773330FFFFFFFF09033337F3FF3FFF77733330F00F0000003
- 33337F773777777333330FFFF0FF033333337F3FF7F3733333330F08F0F03333
- 33337F7737F7333333330FFFF003333333337FFFF77333333333000000333333
- 3333777777333333333333333333333333333333333333333333}
- Layout = blGlyphRight
- NumGlyphs = 2
- Spacing = 11
- end
- end
- object Panel2: TPanel
- Left = 0
- Top = 57
- Width = 525
- Height = 232
- HelpContext = 314
- Align = alClient
- BevelInner = bvLowered
- BevelOuter = bvLowered
- BorderWidth = 4
- Caption = 'Panel2'
- Color = clSilver
- Font.Color = clBlack
- Font.Height = -12
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- OnClick = DBGridENDIKColEnter
- object Label1: TLabel
- Left = 189
- Top = 10
- Width = 3
- Height = 15
- Transparent = True
- Visible = False
- end
- object Label2: TLabel
- Left = 144
- Top = 12
- Width = 42
- Height = 15
- Caption = 'Aranan:'
- Transparent = True
- Visible = False
- end
- object Image1: TImage
- Left = 120
- Top = 8
- Width = 19
- Height = 19
- Picture.Data = {<image000.bmp>}
- end
- object DBGridENDIK: TDBGrid
- Left = 120
- Top = 29
- Width = 293
- Height = 190
- Color = clTeal
- Ctl3D = True
- DataSource = endikBrSRC
- FixedColor = clSilver
- Font.Color = clWhite
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
- ParentCtl3D = False
- ParentFont = False
- TabOrder = 0
- TitleFont.Color = clNavy
- TitleFont.Height = -12
- TitleFont.Name = 'Arial'
- TitleFont.Style = [fsBold]
- OnColEnter = DBGridENDIKColEnter
- OnDblClick = DBGridENDIKDblClick
- OnEnter = DBGridENDIKColEnter
- OnExit = DBGridENDIKColEnter
- OnKeyDown = DBGridENDIKKeyDown
- OnKeyPress = DBGridENDIKKeyPress
- end
- end
- object Panel3: TPanel
- Left = 0
- Top = 289
- Width = 525
- Height = 57
- HelpContext = 314
- Align = alBottom
- BevelInner = bvLowered
- BevelWidth = 3
- BorderWidth = 1
- Color = clNavy
- TabOrder = 2
- object BitBtnYeni: TBitBtn
- Left = 12
- Top = 15
- Width = 89
- Height = 27
- Hint = 'Insert Tu�u'
- Caption = 'Yeni Kay�t'
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 0
- OnClick = BitBtnYeniClick
- OnKeyDown = BitBtnYeniKeyDown
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 04000000000000010000130B0000130B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
- 33333333FF33333333FF333993333333300033377F3333333777333993333333
- 300033F77FFF3333377739999993333333333777777F3333333F399999933333
- 33003777777333333377333993333333330033377F3333333377333993333333
- 3333333773333333333F333333333333330033333333F33333773333333C3333
- 330033333337FF3333773333333CC333333333FFFFF77FFF3FF33CCCCCCCCCC3
- 993337777777777F77F33CCCCCCCCCC3993337777777777377333333333CC333
- 333333333337733333FF3333333C333330003333333733333777333333333333
- 3000333333333333377733333333333333333333333333333333}
- Layout = blGlyphRight
- NumGlyphs = 3
- end
- object BitBtnDegis: TBitBtn
- Left = 115
- Top = 15
- Width = 89
- Height = 27
- Caption = '&De�i�tir'
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = False
- TabOrder = 1
- OnClick = BitBtnDegisClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
- 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
- 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
- F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
- 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
- FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
- FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
- 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
- 00333377737FFFFF7733333033000000033333373377777773330000}
- Layout = blGlyphRight
- NumGlyphs = 2
- Spacing = 5
- end
- object BitBtnSil: TBitBtn
- Left = 218
- Top = 15
- Width = 89
- Height = 27
- Hint = 'Ctrl Delete Tu�u'
- Caption = 'Kay�t Sil'
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = BitBtnSilClick
- Glyph.Data = {
- 78010000424D7801000000000000760000002800000020000000100000000100
- 04000000000000000000120B0000120B00000000000000000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00500005000555
- 555557777F777555F55500000000555055557777777755F75555005500055055
- 555577F5777F57555555005550055555555577FF577F5FF55555500550050055
- 5555577FF77577FF555555005050110555555577F757777FF555555505099910
- 555555FF75777777FF555005550999910555577F5F77777775F5500505509990
- 3055577F75F77777575F55005055090B030555775755777575755555555550B0
- B03055555F555757575755550555550B0B335555755555757555555555555550
- BBB35555F55555575F555550555555550BBB55575555555575F5555555555555
- 50BB555555555555575F555555555555550B55555555555555750000}
- Layout = blGlyphRight
- NumGlyphs = 2
- Spacing = 2
- end
- object BitBtnKapat: TBitBtn
- Left = 321
- Top = 15
- Width = 89
- Height = 27
- Hint = 'Alt-F4 Tu�u'
- Caption = 'Kapat'
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 3
- Kind = bkClose
- Layout = blGlyphRight
- end
- object BitBtnHelp: TBitBtn
- Left = 424
- Top = 15
- Width = 89
- Height = 27
- Hint = 'F1 Tu�u'
- HelpContext = 314
- Caption = 'Yard�m'
- Font.Color = clNavy
- Font.Height = -12
- Font.Name = 'Arial Tur'
- Font.Style = [fsBold]
- ParentFont = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 4
- Kind = bkHelp
- Layout = blGlyphRight
- end
- end
- object endikBrSRC: TDataSource
- DataSet = endikBr
- Left = 209
- Top = 15
- end
- object endikBr: TTable
- DatabaseName = 'ECZ'
- IndexFieldNames = 'ENDIKASYONAD;ENDIKNO'
- TableName = 'ENDIK.DB'
- Left = 222
- Top = 15
- object endikBrENDIKASYONAD: TStringField
- DisplayLabel = 'END�KASYON �S�MLER�'
- FieldName = 'ENDIKASYONAD'
- Required = True
- Size = 36
- end
- object endikBrENDIKNO: TAutoIncField
- FieldName = 'ENDIKNO'
- Visible = False
- end
- end
- object Query1: TQuery
- DatabaseName = 'ECZ'
- Params.Data = {0100010005656E646E6F00030400000000000000}
- SQL.Strings = (
- 'SELECT URUN.ENDIKNO'
- 'FROM URUN'
- 'WHERE ENDIKNO=:endno')
- Left = 456
- Top = 121
- end
- end
-